home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er 1984 November
/
64er_Magazin_84-11_1984_Markt__Technik_de.d64
/
list 1+2
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
564b
|
28 lines
100 rem ****************************
110 rem * *
120 rem * beispielprogramm *
130 rem * *
140 rem * zu D, DE + DG *
150 rem * *
155 rem * D7, D8 + D9 *
156 rem * *
160 rem ****************************
170 rem
175 D7 "s",:D2 DF
180 D 10,2
190 printD(0,20)" ";
200 for i=0 to 255:rem _ alle zeichen
210 : poke 55296+i,0:rem farbe: schwarz
220 : poke 1024+i,i:rem zeichen
230 next i
240 DE 2,1,6,5
250 DF 10
255 D8
260 DG
270 end
280 D1 DF
290 printD(0,20)"pause"
300 DF1
310 printD(0,20)" "
320 D9